home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1995 October
/
EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso
/
Aminet
/
util
/
boot
/
PeekQual.lha
/
PeekQual
/
PeekQual.DocFra
< prev
next >
Wrap
Text File
|
1994-08-27
|
4KB
|
92 lines
Bienvenue à ce petit utilitaire. Avant tout, quelques mots de jargon légal:
Ce programme et tous ses fichiers associés sont copyrightés par l'auteur,
Frédéric Delacroix, et ne peuvent être vendus. Ils sont distribués en FreeWare,
ce qui signifie que tout le monde est autorisé à utiliser et copier le programme
gratuitement tant que tous les fichiers soient distribués ensemble et restent
inchangés. Une petite charge pour la copie et l'expédition est tolérée.
La raison d'être de ce petit programme est la difficulté que j'ai eue à trouver
lequel des programmes lancés dans mon user-startup plantait parfois le système.
J'ai écrit une version spéciale de mon user-startup qui demandait avant de
lancer chaque programme, et j'ai pensé qu'il serait bien pratique d'avoir un
programme qui permette de sélectionner le bon fichier quand on appuyait sur une
touche.
Les meilleures candidates pour ces touches étaient bien sûr les qualificateurs,
puisqu'ils n'interfèrent pas avec la fenêtre de sortie. De plus, il y a une
nouvelle (V36) fonction dans l'input.device qui les rendent faciles à tester:
PeekQualifier(). Alors voici ce programme, qui n'a même pas besoin d'une
fenêtre ouverte pour marcher. Le programme tient dans un seul block du disque
et est pur, c'est-à-dire qu'il peut être rendu résident.
Pour utiliser PeekQual, il vous faut le Kickstart 2.04 ou plus. Il marchera
seulement à partir du CLI, le format est le suivant:
PeekQual ONQUAL,OFFQUAL
Chacun des arguments, ONQUAL et OFFQUAL, doit être un mot constitué des
lettres suivantes (j'ai essayé de respecter cette règle: minuscules pour les
touches de gauche, majuscules pour les touches de droite):
s: Shift gauche
S: Shift droit
c: Control
C: Caps lock
a: Alt gauche
A: Alt droit
g: amiGa gauche
G: amiGa droit
b: Bouton gauche de la souris
B: Bouton droit de la souris
m: bouton du milieu de la souris
Le programme fait la chose suivante: PeekQualifier() et teste le résultat: si
toutes les touches données par l'argument ONQUAL sont pressée et si aucune des
touches données par l'argument OFFQUAL n'est pressée, alors le programme
retourne WARN (5), sinon il retourne OK (0). Le résultat peut alors être testé
avec la commande IF WARN dans un fichier script. Tous les qualificateurs donnés
ni dans ONQUAL, ni dans OFFQUAL sont ignorés.
Exemple, dans votre startup-sequence:
PeekQual CSs
IF WARN
Execute S:User-Startup.Debug
ELSE
Execute S:User-Startup
ENDIF
exécutera le fichier user-startup normal, à moins que vous ne pressiez
caps lock et les deux touches shift au moment où PeekQual est lancé, auquel cas
c'est user-startup.debug qui est exécuté.
Autre exemple, à la fin de votre startup-sequence:
execute S:User-Startup
LoadWB -DEBUG
PeekQual OFFQUAL=G
IF WARN
EndCLI
ENDIF
Ceci terminer normalement la startup-sequence (et fermera la fenêtre si
elle est ouverte), à moins que vous ne pressiez la touche amiga de droite,
auquel cas la fenêtre reste ouverte pour que vous l'utilisiez comme un Shell
normal.
Le source est fourni dans cette archive, et est copyrighté comme les
autres fichiers, mais vous pouvez en faire ce que vous voulez, du moment que
vous mentionnez mon nom. A propos, vous pouvez m'envoyer ce que vous voulez:
bug reports, cartes postales, lettres, argent, programmes DP, Amigas 4000,
lecteurs CD-ROM, etc... Tous recevront une réponse (surtout pour un 4000 :-),
sauf les lettres de swappers qui ont la facheuse habitude de tomber de la gauche
de mon bureau dans la poubelle.
Frédéric Delacroix
5, rue d'Artres
59269 Quérénaing
FRANCE (peut-être sur Internet vers oct 94)
Et, surtout, continuez à supporter l'amiga, surtout maintenant !